home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Magnum One
/
Magnum One (Mid-American Digital) (Disc Manufacturing).iso
/
d10
/
masdr54a.arc
/
MENU.BAT
< prev
next >
Wrap
DOS Batch File
|
1991-04-27
|
2KB
|
69 lines
ECHO off
IF (%SDL%) == () SET SDL=S
IF NOT (%SDL%) == () IF NOT (%1) == ENVIRON GOTO ENVOK
Echo There is insufficient DOS environment free space.
Echo This means that some of the menu features will not work.
Echo Please see the information about the DOS Environment space in
Echo MASDIR54.NEW. After you have increased the environment space,
Echo or freed up some of the existing space, please run %0 again.
goto end
:ENVOK
sdl_get be %A%
set A=%GET%
if (%SDL%)==(Y) goto again
IF EXIST LICENSE.COM LICENSE
IF EXIST REGISTER.COM REGISTER
sdl_get C "Please read carefully, then press Y to indicate acceptance..." Y
set SDL=Y
:again
MENUSCRN
sdl_get C "Select by number, press Esc to exit . . ." 1234567~
if errorlevel 126 goto end
if errorlevel 55 INSTALL
if errorlevel 54 goto PRINT
if errorlevel 53 goto ISFRM
if errorlevel 52 goto ISNEW
if errorlevel 51 SETUP
if errorlevel 50 goto ISDEMO
Sdl_get BE %A%
TUTOR
goto again
:ISDEMO
Sdl_get BE %A%
DEMO
goto again
:ISNEW
SDL_SHOW MASDIR54.NEW
GOTO again
:PRINT
sdl_get p
if errorlevel 1 goto OK
sdl_get B
Echo There does not seem to be a printer attached and ready.
pause
goto AGAIN
:OK
Echo Ready to print - align paper in printer.
sdl_get C "Press Enter to continue, Esc to cancel " }~
if errorlevel 126 goto again
IF EXIST MASDIR.DOC COPY MASDIR.DOC PRN
IF EXIST MASDIR.DOC goto AGAIN
Echo The documentation file MASDIR.DOC is not available.
Pause
GOTO again
:ISFRM
sdl_get p
if errorlevel 1 goto COPY
sdl_get B
Echo There does not seem to be a printer attached and ready.
pause
goto AGAIN
:COPY
COPY ORDER.FRM PRN
GOTO again
:end
sdl_get be %A%
set A=
Set GET=
if exist utility.bat utility